2级VB``在线等``急

来源:百度知道 编辑:UC知道 时间:2024/05/22 12:21:24
在名为FORM1的窗体上绘制一个图象框,名为Image1,其高,宽分别为2000,1800,把一个图片装入图片框,再绘制2个命令按钮,名称分别为Cmd1和Cmd2,标题分别为"放大"和"缩小"

要求
1.请编写适当的事件过程,使程序运行后,若单击"放大"按钮,则把图象框的高度和宽度均增加100;单击"缩小"按钮,则把图象框的高度和宽度均减少100;该程序中不得使用任何变量
2.通过属性窗口设置图象框的适当属性,使得在放大,缩小图象框时,其中的图象也自动放大,缩小

1)
Private Sub cmd1_Click()
Image1.Height = Image1.Height + 100
Image1.Width = Image1.Width + 100
End Sub

Private Sub cmd2_Click()
Image1.Height = Image1.Height - 100
Image1.Width = Image1.Width - 100
End Sub
2)
把image1的stretch属性设为true即可!

这个很简单,希望你自己多看看VB的书,你自己完全可以搞定的!